10 POKE53281,0:POKE53280,0:PRINT"[147]":GOSUB60000
20 PRINT"[129]   [212]  [193]  [216]  [215]  [201]  [211]  [197]     1  9  9  0"
25 PRINT"[154] "CHR$(34)"[193]ND THE NUMBER OF THE [194]EAST WAS 1040"CHR$(34)
30 PRINT"[144]LOAD"CHR$(34)"TAXWISE1/15/91"CHR$(34)",8"
40 PRINT"?CHR$(147);CHR$(142):RUN"
50 POKE631,13:POKE632,13:POKE198,2:END
10000 OPEN15,8,15,"S0:TAXWISE BOOT":CLOSE15:SAVE"TAXWISE BOOT",8:END
60000 B9$="                                      "
60010 POKE214,14:PRINT:PRINT"  [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][152]"
60020 FORI=0TO7:PRINTB9$:NEXT:PRINT"  [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][152]"
60030 B9$(0)="[212] [193] [216] [215] [201] [211] [197]    [214] 2"
60040 B9$(1)="([195]) 1988, 1991 BY [202]OHN [198]OSTER"
60050 B9$(2)="[193] [211]OFTDISK [208]UBLICATION"
60060 B9$(3)="[208]UBLISHED ON [204][207][193][196][211][212][193][210] #80"
60070 B9$(4)="[211]UBSCRIPTIONS 1-800-831-2694"
60080 B9$(5)="[193]LL [210]IGHTS [210]ESERVED"
60090 POKE214,16:PRINT:FORI=0TO5:PRINTTAB(20-(LEN(B9$(I))/2))""B9$(I):NEXT
60099 RETURN